Fix puny-encoding all-non-ASCII domains

* puny.el (puny-encode-string): Fix the all-non-ASCII encoding case.

diff --git a/lisp/net/puny.el b/lisp/net/puny.el
index a16e3a07706834aff81e372b41f50664a7daabf0..d96c6c22196ae04700545432b4a65ce4de4f2ba6 100644 (file)
--- a/lisp/net/puny.el
+++ b/lisp/net/puny.el
@@ -47,7 +47,11 @@ For instance, \"bücher\" => \"xn--bcher-kva\"."
                            string)))
     (if (= (length ascii) (length string))
         string
-      (concat "xn--" ascii "-" (puny-encode-complex (length ascii) string)))))
+      (concat "xn--"
+              (if (null ascii)
+                  ""
+                (concat ascii "-"))
+              (puny-encode-complex (length ascii) string)))))
 
 (defun puny-decode-domain (domain)
   "Decode DOMAIN according to the IDNA/punycode algorith.